/*
  Creator: Kisamin Resident and copyright by her.  All rights reserved except those specifically set forth here:
  You may:
  	Use these scripts in any project
	Modify these scripts in any way you wish subject to:
		1. Retaining this set of comments
		2. Explicity commenting and showing any changes you might make
	You may NOT:
	License these scripts to someone else with restrictions differing from the above.
	Charge a fee for the scripts themselves (although you may charge for an object that
		utilizes these scripts to add functionality)
	Charge a fee for any "library" or "collection" of scripts that includes this script.

If you have questions about your rights under this coment and/or the Gnu CopyLeft, please request further information
and/or explicit permission from Kisamin Resident

This script is not intended to be efficient or low lag.  It is merely a tst harness for unit testing of components of the missile
system.
*/

integer myChannel () {
  return (integer)("0x" + llGetSubString ((string)llGetOwner (), 0, 7));
}


 default {

   touch_start (integer in_iNumTouchers) {
	 integer i;
	 for (i=0; i<in_iNumTouchers; i++)
	   if (llDetectedKey (i) == llGetOwner ()) {
		 llRegionSay (myChannel (), "shoot");
		 return;
	   }
   }
 }
